Dim conn As OracleConnection
Dim cmd As OracleCommand

Dim cmdString As String = "Select CompanyName from Customers"
conn = New OracleConnection("User Id=bevjen;Password=bevjen01;Data Source=myOracleDB")
cmd = New OracleCommand(cmdString, conn)
cmd.CommandType = CommandType.Text

conn.Open()
